home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / act5 / 00389.ls < prev    next >
Encoding:
Text File  |  1995-03-28  |  452 b   |  18 lines

  1. on exitFrame
  2.   global firstframe
  3.   set firstframe to the frame
  4.   repeat with yyy = 7 to 14
  5.     set temp to word 1 of the name of cast the castNum of sprite yyy
  6.     set the castNum of sprite yyy to the number of cast (temp && "?")
  7.     puppetSprite(yyy, 0)
  8.   end repeat
  9.   sdeact(17)
  10.   puppetSprite(3, 0)
  11.   puppetSprite(4, 1)
  12.   puppetSprite(6, 0)
  13.   set the ink of sprite 4 to 36
  14.   set the backColor of sprite 4 to 151
  15.   updateStage()
  16.   puppetSound(0)
  17. end
  18.